Namespace HBBSoft.Pivot
    Friend NotInheritable Class Cell
        Dim _Value As Object
        Public Property Value() As Object
            Get
                Return _Value
            End Get
            Set(ByVal sValue As Object)
                _Value = sValue
            End Set
        End Property

        Dim _FormattedValue As String
        Public Property FormattedValue() As String
            Get
                Return _FormattedValue
            End Get
            Set(ByVal sValue As String)
                _FormattedValue = sValue
            End Set
        End Property

        Dim _Measure As Measure
        Public Property Measure() As Measure
            Get
                Return _Measure
            End Get
            Set(ByVal value As Measure)
                _Measure = value
            End Set
        End Property

        Dim _RowMember As Member
        Public Property RowMember() As Member
            Get
                Return _RowMember
            End Get
            Set(ByVal value As Member)
                _RowMember = value
            End Set
        End Property

        'Dim _ColMember As Member
        'Public Property ColMember() As Member
        '    Get
        '        Return _ColMember
        '    End Get
        '    Set(ByVal value As Member)
        '        _ColMember = value
        '    End Set
        'End Property

        Dim _Style As New System.Web.UI.WebControls.TableItemStyle
        Public Property Style() As System.Web.UI.WebControls.TableItemStyle
            Get
                Return _Style
            End Get
            Set(ByVal value As System.Web.UI.WebControls.TableItemStyle)
                _Style = value
            End Set
        End Property

    End Class
End Namespace




